100
How can I remove an event
Procedure OnCreate
	Forward Send OnCreate
	Set ComAutoSize to False
	Set ComFixedCellWidth to 36
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComImage of hoEvent to 1
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Variant voEvents1
	Get ComEvents to voEvents1
	Handle hoEvents1
	Get Create (RefClass(cComEvents)) to hoEvents1
	Set pvComObject of hoEvents1 to voEvents1
		Variant vIndex
			Get ComDate to vIndex
		Send ComRemove of hoEvents1 vIndex
	Send Destroy to hoEvents1
End_Procedure
99
How can I count the events
Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComImage of hoEvent to 1
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Variant v
	Variant voEvents1
	Get ComEvents to voEvents1
	Handle hoEvents1
	Get Create (RefClass(cComEvents)) to hoEvents1
	Set pvComObject of hoEvents1 to voEvents1
		Get ComCount of hoEvents1 to v
	Send Destroy to hoEvents1
	Variant var_Count
	Move v to var_Count
End_Procedure
98
How can I clear all events
Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComImage of hoEvent to 1
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Variant voEvents1
	Get ComEvents to voEvents1
	Handle hoEvents1
	Get Create (RefClass(cComEvents)) to hoEvents1
	Set pvComObject of hoEvents1 to voEvents1
		Send ComClear of hoEvents1
	Send Destroy to hoEvents1
End_Procedure
96
How can I assign an icon to a date

Procedure OnCreate
	Forward Send OnCreate
	Set ComAutoSize to False
	Set ComFixedCellWidth to 36
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComImage of hoEvent to 1
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
95
How can I enable or disable a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComDisabled of hoEvent to True
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
94
How can I mark or highlight a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComMarker of hoEvent to True
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
93
How can I assign a tooltip or a comment to a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
			Set ComCommentTitle of hoEvent to "T I T L E"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
92
How can I assign any extra data to a date
Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComUserData of hoEvent to "your data"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
91
How can I change the background color for a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComBackColor of hoEvent to (RGB(255,0,0))
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
90
How can I change the foreground color for a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComForeColor of hoEvent to (RGB(255,0,0))
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
89
How can I draw a date as strikeout

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComStrikeOut of hoEvent to True
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
88
How can I underline a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComUnderline of hoEvent to True
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
87
How can I make italic a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComItalic of hoEvent to True
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
86
How can I bold a date

Procedure OnCreate
	Forward Send OnCreate
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComBold of hoEvent to True
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
85
How can I get the last visible date being displayed in the calendar
Procedure OnCreate
	Forward Send OnCreate
	Set ComShowNonMonthDays to False
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComLastVisibleDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is the last visible date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
84
How can I get the first visible date being displayed in the calendar
Procedure OnCreate
	Forward Send OnCreate
	Set ComShowNonMonthDays to False
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComFirstVisibleDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is the first visible date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
83
How can I hide the ticker that's shown for dates that have a tooltip or a comment
Procedure OnCreate
	Forward Send OnCreate
	Set ComCommentBackColor to (ComBackColor(Self))
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
End_Procedure
82
How can I change the visual aspect of the dates that have a comment or a tooltip assigned

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComCommentBackColor to |CI$1000000
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
81
How can I change the visual aspect of the dates that have a comment or a tooltip assigned
Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 11 "c:\exontrol\images\normal.ebn" to Nothing
		Get ComAdd of hoAppearance 1 "CP:11 4 2 -2 -2" to Nothing
	Send Destroy to hoAppearance
	Set ComCommentBackColor to |CI$1000000
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
80
How can I change the color to highlight the dates that have a comment or a tooltip assigned

Procedure OnCreate
	Forward Send OnCreate
	Set ComCommentBackColor to (RGB(0,0,0))
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
79
How can I hide the days that are shown in gray, and doesn' belong to the month

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowNonMonthDays to False
End_Procedure
78
How can I change the color for non working days

Procedure OnCreate
	Forward Send OnCreate
	Set ComNonworkingDays to 6
	Set ComNonworkingDaysPattern to OLEexPatternCross
	Set ComNonworkingDaysColor to (RGB(255,0,0))
End_Procedure
77
How can I change the pattern or the style to draw the non working days

Procedure OnCreate
	Forward Send OnCreate
	Set ComNonworkingDays to 6
	Set ComNonworkingDaysPattern to OLEexPatternCross
End_Procedure
76
How can I show or hide the non working days
Procedure OnCreate
	Forward Send OnCreate
	Set ComNonworkingDays to 0
End_Procedure
75
How can I specify the non working days
Procedure OnCreate
	Forward Send OnCreate
	Set ComNonworkingDays to 6
End_Procedure
72
How can I specify the min and max years to scroll within
Procedure OnCreate
	Forward Send OnCreate
	Set ComMinScrollYear to 2001
	Set ComMaxScrollYear to 2010
End_Procedure
71
How do I let the tooltip being displayed longer

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipPopDelay to 10000
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
69
How can I change the date that gets the focus
Procedure OnCreate
	Forward Send OnCreate
	Set ComDate to "1/1/2001"
	Set ComFocusDate to "1/2/2001"
End_Procedure
68
How can I select a new date
Procedure OnCreate
	Forward Send OnCreate
	Set ComDate to "1/1/2001"
	Set ComValue to "1/2/2001"
End_Procedure
67
I've seen that the width of the tooltip is variable. Can I make it larger

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipWidth to 328
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
66
How do I disable showing the tooltip for all control
Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipDelay to 0
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
65
How do I show the tooltip quicker
Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipDelay to 1
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
64
How do I call your x-script language
Procedure OnCreate
	Forward Send OnCreate
	Get ComExecuteTemplate "BackColor = RGB(255,0,0)" to Nothing
End_Procedure
63
How do I call your x-script language
Procedure OnCreate
	Forward Send OnCreate
	Set ComTemplate to "BackColor = RGB(255,0,0)"
End_Procedure
62
Can I change the font for the tooltip

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipDelay to 1
	Variant voStdFont
	Get ComToolTipFont to voStdFont
	Handle hoStdFont
	Get Create (RefClass(cComStdFont)) to hoStdFont
	Set pvComObject of hoStdFont to voStdFont
		Set ComName of hoStdFont to "Tahoma"
		Set ComSize of hoStdFont to 14
	Send Destroy to hoStdFont
	Set ComToolTipWidth to 364
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
61
How can I change the caption of the Today's button

Procedure OnCreate
	Forward Send OnCreate
	Set ComTodayCaption to "Azi"
End_Procedure
59
How do I unselect a date

Procedure OnCreate
	Forward Send OnCreate
	Set ComSingleSel to False
	Set ComDate to "1/1/2001"
	Set ComSelDate to "1/2/2001"
	Set ComSelDate to "1/3/2001"
	Set ComSelDate to "1/4/2001"
	Send ComUnSelDate "1/3/2001"
End_Procedure
58
How do I get the list of selected dates
// Fired when the selection is changed.
Procedure OnComSelectionChanged 
	Forward Send OnComSelectionChanged 
	Showln (ComSelDate(Self))
End_Procedure
57
How do I select multiple dates

Procedure OnCreate
	Forward Send OnCreate
	Set ComSingleSel to False
	Set ComDate to "1/1/2001"
	Set ComSelDate to "1/2/2001"
	Set ComSelDate to "1/3/2001"
	Set ComSelDate to "1/4/2001"
End_Procedure
56
How do I get the selected date
Procedure OnCreate
	Forward Send OnCreate
	Set ComSelDate to (ComDate(Self))
End_Procedure
55
How can I build a date expression
Procedure OnCreate
	Forward Send OnCreate
	Set ComDate to (ComDoDate(Self,2001,1,1))
End_Procedure
54
How can I select a new date

Procedure OnCreate
	Forward Send OnCreate
	Set ComDate to (ComDoDate(Self,2001,1,1))
	Set ComSelDate to (ComDoDate(Self,2001,1,2))
End_Procedure
53
How can I select a new date
Procedure OnCreate
	Forward Send OnCreate
	Set ComDate to "1/1/2001"
	Set ComSelDate to "1/2/2001"
End_Procedure
52
How can I change the browsed date
Procedure OnCreate
	Forward Send OnCreate
	Set ComDate to "1/1/2001"
End_Procedure
51
How can I show or hide the buttons that in the header

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowYearSelector to False
	Set ComShowMonthSelector to False
End_Procedure
50
How can I show or hide the buttons that scrolls the years

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowYearSelector to False
End_Procedure
49
How can I disable changing the month in the months selector

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowMonthSelector to False
End_Procedure
48
How can I change the visual aspect of the selected date, using your EBN

Procedure OnCreate
	Forward Send OnCreate
	Set ComBackColor to (RGB(255,255,255))
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComSelBackColor to |CI$1000000
	Set ComSelForeColor to (ComBackColor(Self))
End_Procedure
47
How can I change the colors for selected dates

Procedure OnCreate
	Forward Send OnCreate
	Set ComSelBackColor to (RGB(0,0,0))
	Set ComSelForeColor to (RGB(255,255,255))
End_Procedure
46
How can I change the color of the line arround a month

Procedure OnCreate
	Forward Send OnCreate
	Set ComDrawBorderLine to OLELargeDots
	Set ComBorderLineColor to (RGB(255,0,0))
End_Procedure
45
How can I change the style of the line arround a month

Procedure OnCreate
	Forward Send OnCreate
	Set ComDrawBorderLine to OLELargeDots
End_Procedure
44
How can I specify the number of months being displayed
Procedure OnCreate
	Forward Send OnCreate
	Set ComShowTodayButton to False
	Set ComShowYearScroll to False
	Set ComMinMonthX to 2
	Set ComMaxMonthX to 2
	Set ComMinMonthY to 2
	Set ComMaxMonthY to 2
End_Procedure
43
How can I lock the control, so user can't select a new date
Procedure OnCreate
	Forward Send OnCreate
	Set ComLocked to True
End_Procedure
42
How do I change the first day of the week

Procedure OnCreate
	Forward Send OnCreate
	Set ComFirstDay to OLEMonday
End_Procedure
41
How do I change the name of the months

Procedure OnCreate
	Forward Send OnCreate
	Set ComMonthNames to "Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec"
End_Procedure
40
How do I change the name of the months

Procedure OnCreate
	Forward Send OnCreate
	Set ComMonthName OLEJanuary to "Jan"
	Set ComMonthName OLEFebruary to "Feb"
	Set ComMonthName OLEMarch to "Mar"
	Set ComMonthName OLEApril to "Apr"
	Set ComMonthName OLEMay to "May"
	Set ComMonthName OLEJune to "Jun"
	Set ComMonthName OLEJuly to "Jul"
	Set ComMonthName OLEAugust to "Aug"
	Set ComMonthName OLESeptember to "Sep"
	Set ComMonthName OLEOctober to "Oct"
	Set ComMonthName OLENovember to "Nov"
	Set ComMonthName OLEDecember to "Dec"
End_Procedure
39
How do I change the name for each week day

Procedure OnCreate
	Forward Send OnCreate
	Set ComAutoSize to False
	Set ComFixedCellWidth to 24
	Set ComFixedCellHeight to 16
	Set ComWeekDays to "Su Mo Tu We Th Fr Sa"
	Set ComHeaderForeColor to (RGB(255,0,0))
	Set ComHeaderBackColor to (RGB(255,255,255))
End_Procedure
38
How can I specify the width and height for dates being displayed in the calendar
Procedure OnCreate
	Forward Send OnCreate
	Set ComAutoSize to False
	Set ComFixedCellWidth to 22
	Set ComFixedCellHeight to 16
End_Procedure
37
How can I specify the width and height for dates being displayed in the calendar
Procedure OnCreate
	Forward Send OnCreate
	Set ComAutoSize to False
	Set ComFixedCellWidth to 32
	Set ComFixedCellHeight to 24
End_Procedure
36
How do I change the appearance for dates in the calendar

Procedure OnCreate
	Forward Send OnCreate
	Set ComAppearanceDay to OLEDay3D
	Set ComBackColor to |CI$8000000f
End_Procedure
35
How do I specify the color for the grid lines

Procedure OnCreate
	Forward Send OnCreate
	Set ComDrawGridLine to OLESmallDots
	Set ComGridLineColor to (RGB(255,0,0))
End_Procedure
34
How do I draw the grid lines

Procedure OnCreate
	Forward Send OnCreate
	Set ComDrawGridLine to OLESmallDots
End_Procedure
33
How do I change the foreground color for the week days and week numbers header

Procedure OnCreate
	Forward Send OnCreate
	Set ComHeaderForeColor to (RGB(255,0,0))
	Set ComShowWeeks to True
End_Procedure
32
How do I change the background color for the week days and week numbers header

Procedure OnCreate
	Forward Send OnCreate
	Set ComHeaderBackColor to (RGB(255,0,0))
	Set ComShowWeeks to True
End_Procedure
31
How can I show or hide the 'Today' button

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowTodayButton to False
End_Procedure
30
How can I show or hide the scroll bar that changes the year

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowYearScroll to False
End_Procedure
29
How can I show or hide the header that displays the months

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowMonth to False
End_Procedure
28
How can I show or hide the header that displays the week days

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowDays to False
End_Procedure
27
How do I show or hide the weeks

Procedure OnCreate
	Forward Send OnCreate
	Set ComShowWeeks to True
End_Procedure
26
How can I change the visual appearance of Today date in the calendar

Procedure OnCreate
	Forward Send OnCreate
	Set ComMarkToday to True
	Set ComBackground OLEexMarkToday to (RGB(255,0,0))
End_Procedure
25
How do I mark the Today date

Procedure OnCreate
	Forward Send OnCreate
	Set ComMarkToday to True
End_Procedure
24
How can I show the control's selection even if the control loses the focus

Procedure OnCreate
	Forward Send OnCreate
	Set ComHideSelection to False
End_Procedure
23
How can I hide the control's selection when the control loses the focus

Procedure OnCreate
	Forward Send OnCreate
	Set ComHideSelection to True
End_Procedure
22
How do I enable single selection
Procedure OnCreate
	Forward Send OnCreate
	Set ComSingleSel to True
End_Procedure
21
How do I enable multiple selection

Procedure OnCreate
	Forward Send OnCreate
	Set ComSingleSel to False
End_Procedure
20
How do I disable or enable the control
Procedure OnCreate
	Forward Send OnCreate
	Set ComEnabled to False
End_Procedure
19
Can I change the forecolor for the tooltip

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipDelay to 1
	Set ComToolTipWidth to 364
	Set ComBackground OLEexToolTipForeColor to (RGB(255,0,0))
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
18
Can I change the background color for the tooltip

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipDelay to 1
	Set ComToolTipWidth to 364
	Set ComBackground OLEexToolTipBackColor to (RGB(255,0,0))
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
17
Can I change the default border of the tooltip, using your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipDelay to 1
	Set ComToolTipWidth to 364
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexToolTipAppearance to |CI$1000000
	Variant voEvents
	Get ComEvents to voEvents
	Handle hoEvents
	Get Create (RefClass(cComEvents)) to hoEvents
	Set pvComObject of hoEvents to voEvents
Variant vEvent
			Get ComDate to vEvent
				Variant voEvent
		Get ComAdd of hoEvents vEvent to voEvent
		Handle hoEvent
		Get Create (RefClass(cComEvent)) to hoEvent
		Set pvComObject of hoEvent to voEvent
			Set ComComment of hoEvent to "This is a text that shows up when the cursor hovers the date"
		Send Destroy to hoEvent
	Send Destroy to hoEvents
	Set ComHideSelection to True
End_Procedure
16
How can I change the visual appearance of the selected month, in the months selector, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexMonthSelect to |CI$1000000
	Set ComBackground OLEexMonthSelectForeColor to (RGB(255,0,0))
End_Procedure
15
How can I change the visual appearance of Today date in the calendar, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexMarkToday to |CI$1000000
	Set ComBackground OLEexDropDownSelForeColor to (RGB(1,0,0))
	Set ComSelForeColor to (RGB(0,0,0))
	Set ComMarkToday to True
End_Procedure
14
How can I change the visual appearance of separator between calendar and 'Today' button , using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexDateSeparatorBar to |CI$1000000
End_Procedure
13
How can I change the visual appearance of the scrolling bar for years, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Set ComBackground OLEexDateScrollRange to |CI$1000000
	Set ComBackground OLEexDateScrollThumb to |CI$2000000
End_Procedure
12
How can I change the visual appearance of 'Today' button, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Set ComBackground OLEexDateTodayUp to |CI$1000000
	Set ComBackground OLEexDateTodayDown to |CI$2000000
End_Procedure
11
How can I change the visual appearance of header , using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexDateHeader to |CI$1000000
	Set ComHeaderForeColor to (RGB(255,0,0))
End_Procedure
10
How can I change the visual appearance of header that week numbers, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexWeeksHeader to |CI$1000000
	Set ComHeaderForeColor to (RGB(255,0,0))
	Set ComShowWeeks to True
End_Procedure
9
How can I change the visual appearance of header that displays days, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexDaysHeader to |CI$1000000
End_Procedure
8
How can I change the visual appearance of the drop down button, using EBN files
Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Set ComBackground OLEexDropDownButtonUp to |CI$1000000
	Set ComBackground OLEexDropDownButtonDown to |CI$2000000
End_Procedure
7
How do I change the visual appearance of the left and right buttons in the calendar's header, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexScrollLeft to |CI$1000000
	Set ComBackground OLEexScrollRight to |CI$1000000
End_Procedure
6
How do I change the visual appearance of the up and down buttons in the calendar's header, using EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexScrollUp to |CI$1000000
	Set ComBackground OLEexScrollDown to |CI$1000000
End_Procedure
5
How do I change the control's foreground color

Procedure OnCreate
	Forward Send OnCreate
	Set ComForeColor to (RGB(255,0,0))
End_Procedure
4
How do I change the control's background color

Procedure OnCreate
	Forward Send OnCreate
	Set ComBackColor to (RGB(200,200,200))
End_Procedure
3
How can I change the control's font

Procedure OnCreate
	Forward Send OnCreate
	Variant voStdFont
	Get ComFont to voStdFont
	Handle hoStdFont
	Get Create (RefClass(cComStdFont)) to hoStdFont
	Set pvComObject of hoStdFont to voStdFont
		Set ComName of hoStdFont to "Verdana"
	Send Destroy to hoStdFont
End_Procedure
2
How do I change the control's border, using your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComAppearance to |CI$1000000
End_Procedure
1
How do I remove the control's border

Procedure OnCreate
	Forward Send OnCreate
	Set ComAppearance to OLENone2
End_Procedure